home *** CD-ROM | disk | FTP | other *** search
/ The Fatted Calf / The Fatted Calf.iso / Applications / Communication / MailHelper / Source / Controller.m < prev    next >
Encoding:
Text File  |  1993-09-13  |  11.7 KB  |  430 lines
  1. /* Controller.m -- Controller object for MailHelper application.
  2.    Copyright 1991, Izumi Ohzawa and Manuel Alberto Ricart, All rights reserved.
  3.    3-17-91  V1.0 (IO)
  4.     * Starting project.
  5.     * Some codes are borrowed from AtYourService NeXT demo application.
  6.    4-6-91   V1.0 (IO)
  7.     * Bug fix: fclose(fpin); was missing in method insertSignature.
  8.    9-18-91  V1.1 (MAR)
  9.     * Preferences panel and use of default database to store them.
  10.         Joint venture with Izumi? Perhaps.    Izumi sent me his code
  11.         for MailHelper.  I told him I implement some basic prefs for him.
  12.    9-22-91  V1.1 (IO)
  13.     * Defaults now written out as soon as OK button in Pref panel is pressed.
  14.     * Signature insertion now adds a separator '---' within the code to
  15.         remove requirement of having it in signature file itself (to make MailHelper
  16.         conform with other programs which use .signature).
  17.     * RTF signature insertion added.
  18.     
  19.   10-9-91  V1.2 (Mitsuhiro Kishimoto)
  20.     * Japanese re-format routine: needed to handle mixed ASCII and 2-byte EUC code.
  21.         Original "Kin-soku" (forbidden line break) code was written
  22.         by Masatoshi Kurihara.
  23.         
  24.   9-10-93 V1.3 Mike O'Neill (emo@mitre.org) added .rtfd support, grayed rtf selection, and 3.0 colorized icon and compiled FAT
  25.  
  26.    To implement:
  27.    User selectable command keys for various functions.
  28. */
  29.  
  30.  
  31. #import "Controller.h"
  32. #import <appkit/appkit.h>
  33.  
  34.  
  35. @implementation Controller
  36.  
  37. /* Modified Izumi's code to load the defaults at startup.
  38.  * It also sets up the default values on the prefs panel.
  39. */
  40. - appDidInit:sender
  41. {
  42.     static NXDefaultsVector MailHelperDefaults = {
  43.         {WIDTH,"62"},
  44.         {QUOTE,"> "},
  45.         {SIGFILE,SIGFILENAME},
  46.         {RTFSIGFILE,RTFSIGFILENAME},
  47.         {RTFDSIGFILE,RTFDSIGFILENAME},
  48.         {NULL}
  49.     };
  50.     myListener = [NXApp appListener];
  51.     [myListener setServicesDelegate: self];
  52.     
  53.     NXRegisterDefaults(APPNAME, MailHelperDefaults);
  54.     wrapWidth = atoi(NXGetDefaultValue(APPNAME, WIDTH));
  55.     [gWrapWidth setIntValue:wrapWidth];
  56.     [gWrapScroller setIntValue:wrapWidth];
  57.     quoteString =(char *) NXGetDefaultValue(APPNAME, QUOTE);
  58.     [gQuoteString setStringValue:quoteString];
  59.     sigFile =(char *) NXGetDefaultValue(APPNAME, SIGFILE);
  60.     [gSigFileName setStringValue:sigFile];
  61.     rtfSigFile =(char *) NXGetDefaultValue(APPNAME, RTFSIGFILE);
  62.     [gRtfSigFileName setStringValue:rtfSigFile];    
  63.     rtfdSigFile =(char *) NXGetDefaultValue(APPNAME, RTFDSIGFILE);
  64.     [gRtfdSigFileName setStringValue:rtfdSigFile];
  65. //    [gRtfdText setGraphicsImportEnabled:YES];
  66.     return self;
  67. }
  68.  
  69.     
  70.  
  71. /* Brings up the Info panel.   Not done on startup because it's in a separate
  72.  * interface file. Saves startup time for the user if we do this when they ask
  73.  * for it, and not before.
  74.  * "infoPanel" and "helpPanel" are defined in "Info.nib".
  75.  */
  76. - infoPanel:sender
  77. {
  78.     if( ! infoPanel ){
  79.     [NXApp loadNibSection:"Info.nib" owner:self];
  80.     }
  81.     [infoPanel makeKeyAndOrderFront:sender];
  82.     return self;    
  83. }
  84.  
  85. // Records the prefsPanel values into the global variables
  86. /* [izumi] Moved from delegate method -appWillTerminate:, because it is
  87.  * not apparently called if user is logging out from Workspace --
  88.  * this is how MailHelper gets terminated (MailHelper is almost never
  89.  * exited via Quit from menu.).
  90. */
  91. - prefsOK:sender
  92. {
  93.    char buf[20];
  94.     wrapWidth = (int)[gWrapWidth intValue];
  95.     quoteString = (char *)[gQuoteString stringValue];
  96.     sigFile = (char *)[gSigFileName stringValue];    
  97.     rtfSigFile = (char *)[gRtfSigFileName stringValue];    
  98.  
  99.     sprintf(buf, "%d", wrapWidth);
  100.     NXWriteDefault(APPNAME, WIDTH, buf);
  101.     NXWriteDefault(APPNAME, QUOTE, quoteString);
  102.     NXWriteDefault(APPNAME, SIGFILE, sigFile);
  103.     NXWriteDefault(APPNAME, RTFSIGFILE, rtfSigFile);
  104.     return self;    
  105. }
  106.  
  107. - prefsCancel:sender
  108. { 
  109.     [gWrapWidth setIntValue:wrapWidth];
  110.     [gWrapWidth display];
  111.     [gWrapScroller setIntValue:wrapWidth];
  112.     [gWrapScroller display];
  113.     [gQuoteString setStringValue:quoteString];
  114.     [gQuoteString display];
  115.     [gSigFileName setStringValue:sigFile];
  116.     [gSigFileName display];
  117.     [gRtfSigFileName setStringValue:rtfSigFile];
  118.     [gRtfSigFileName display];
  119.     
  120.     return self;
  121. }
  122. /*
  123.  * Brings up the Help panel (as above)
  124.  */
  125. - helpPanel:sender
  126. {
  127.     if( ! helpPanel ){
  128.     [NXApp loadNibSection:"Info.nib" owner:self];
  129.     }
  130.     [helpPanel makeKeyAndOrderFront:sender];
  131.     return self;    
  132.  
  133. }
  134.  
  135.  
  136.  
  137. /* Reformats selected text so that it fits into a specified column width.
  138.  * Alberto's Modifications:
  139.  * initialized colLimit to wrapWidth global variable.
  140. */
  141.  
  142. - reformatSelection:(id)pbid userData:(const char *)udata error:(char **)errmsg
  143. {
  144. char *data; 
  145. int   length;
  146. const char *const *types;
  147. int   hasAscii, i;
  148.  
  149.     types = [pbid types];        /* get a list of pasteboard types */
  150.     hasAscii = 0;
  151.     for(i=0; !hasAscii && types[i]; i++)
  152.         if(!strcmp(types[i], NXAsciiPboardType)) hasAscii = 1;
  153.     if(hasAscii)
  154.     {
  155.         [pbid readType:NXAsciiPboardType data:&data length:&length];
  156.         if(data && length)
  157.         {
  158.         char *returnData, *dataptr, *endptr;
  159.         char *retptr;
  160.         int col;
  161.         unsigned char c1, c2;
  162.  
  163.         col = 0;
  164.         returnData=malloc(length+10);
  165.         dataptr = data;
  166.         endptr = dataptr+length;
  167.         retptr = returnData;
  168.  
  169.         while (dataptr < endptr) {
  170.             c1 = *dataptr++;
  171.             c2 = (iskanji (c1) ? *dataptr++ :  *dataptr);
  172.  
  173.             switch (c1) {
  174.                 case '\n':
  175.                     if ( c2 == '\n')
  176.                         col = 0;
  177.                     else if (iskanji (c2))
  178.                         goto skip_char;
  179.                     else
  180.                         c1 = ' ';
  181.                     break;
  182.                 case '\t':
  183.                     col = (col + 8) &~ 7;
  184.                     break;
  185.                 case '\b':
  186.                     col = col ? col - 1 : 0;
  187.                     break;
  188.                 default:
  189.                     col = col + (iskanji (c1) ? 2 : 1);
  190.             }
  191.             if (col > wrapWidth) {
  192.                 if ( ! iskanji (c1)) {
  193.                 for (i = 1; 0 < col - i; i++) {
  194.                     c2 = *(retptr - i);
  195.                     if ( iskanji (c2) ) {
  196.                         dataptr -= i;
  197.                         retptr -= (i - 1);
  198.                         *retptr++ = '\n';
  199.                         col = 0;
  200.                         goto skip_char;
  201.                     } else if ( isspace (c2) ) {
  202.                         dataptr -= i;
  203.                         retptr -= i;
  204.                         *retptr++ = '\n';
  205.                         col = 0;
  206.                         goto skip_char;
  207.                     }
  208.                 }
  209.                 *retptr++ = '\n';
  210.                 col = 1;
  211.                 } else if (iskanji (c1) &&  ! KINSOKU (c1, c2)) {
  212.                 *retptr++ = '\n';
  213.                 col = 2;
  214.                 }                
  215.             }
  216.             *retptr++= c1;
  217.             if (iskanji (c1))
  218.                 *retptr++= c2;
  219.             else if (c1 == '\n' &&  c2 == '\n') {
  220.                 *retptr++= c2;
  221.                 dataptr++;
  222.             }
  223.     skip_char:
  224.         ;
  225.         }
  226.         *retptr++= '\n';
  227.         *retptr = '\0';
  228.         [pbid declareTypes:&NXAsciiPboardType num:1 owner:self];
  229.         [pbid writeType:NXAsciiPboardType data:returnData length:strlen(returnData)];
  230.         free(returnData);
  231.         } /* end if(data && length) */
  232.         else
  233.         *errmsg = "Selection is empty.";
  234.     }  /* end if(hasAscii) */
  235.     else
  236.         *errmsg = "No ASCII text found in your selection.";
  237.     return self;
  238. }
  239.  
  240.  
  241.  
  242. /* Adds quotation marks "> " to the head of each line of selected text.
  243.  * Alberto's Modification:
  244.  * Only changed the definition of quotestr to point to the quoteString global.
  245. */
  246.  
  247. - quoteSelection:(id)pbid userData:(const char *)udata error:(char **)errmsg
  248. {
  249. char *data; 
  250. int   length;
  251. const char *const *types;
  252. char *quotestr = quoteString;
  253. int   hasAscii, i, quotelen;
  254.  
  255.     quotelen = strlen(quotestr);
  256.     types = [pbid types];        /* get a list of pasteboard types */
  257.     hasAscii = 0;
  258.     for(i=0; !hasAscii && types[i]; i++)
  259.         if(!strcmp(types[i], NXAsciiPboardType)) hasAscii = 1;
  260.     if(hasAscii)
  261.     {
  262.         [pbid readType:NXAsciiPboardType data:&data length:&length];
  263.         if(data && length)
  264.         {
  265.     int numlines;
  266.         char ch;
  267.     char *returnData, *dataptr, *endptr, *outptr;
  268.  
  269.         numlines = 1;
  270.         dataptr = data;          /* ptr to original data */
  271.         endptr = data+length;      /* ptr to end of data */
  272.         while(dataptr < endptr)      /* count the number of lines */
  273.             if(*dataptr++ == '\n')
  274.             numlines++;
  275.         returnData=malloc(length+numlines*quotelen+10);
  276.         dataptr = data;          /* reinitialize ptr to orig data */
  277.         outptr = returnData;
  278.         for(i=0;i<quotelen;i++)
  279.            *outptr++ = quotestr[i];
  280.         while(dataptr < endptr)
  281.         {
  282.             if((ch = *dataptr++) == '\n')
  283.             {
  284.             *outptr++ = ch;
  285.             for(i=0;i<quotelen;i++)
  286.                *outptr++ = quotestr[i];
  287.             }
  288.             else
  289.             *outptr++ = ch;
  290.         }
  291.         *outptr = '\n';
  292.         *(outptr+1) = '\0';
  293.         [pbid declareTypes:&NXAsciiPboardType num:1 owner:self];
  294.         [pbid writeType:NXAsciiPboardType data:returnData length:strlen(returnData)];
  295.         free(returnData);
  296.         } /* end if(data && length) */
  297.         else
  298.         *errmsg = "Selection is empty.";
  299.     }  /* end if(hasAscii) */
  300.     else
  301.         *errmsg = "No ASCII text found in your selection.";
  302.     return self;
  303. }
  304.  
  305.  
  306. // Adds the content of ~/.signature at the current cursor location.
  307.  
  308. - insertSignature:(id)pbid userData:(const char *)udata error:(char **)errmsg
  309. {
  310. char *data, *dataptr;
  311. char *signaturefile = sigFile;
  312. char signaturepath[256];
  313. int length, i;
  314. struct stat filestat;
  315. FILE *fpin;
  316.     sprintf(signaturepath, "%s/%s", NXHomeDirectory(), signaturefile);
  317.     if(stat(signaturepath, &filestat))
  318.     {
  319.     data = "";
  320.     length = 0;
  321.     *errmsg = "No signature file found in your home directory.";
  322.     }
  323.     else
  324.     {
  325.     length = filestat.st_size;
  326.     if((fpin = fopen(signaturepath, "r")) != NULL)
  327.     {
  328.         dataptr = data = malloc(length+NUMSIGDASH+10);  /* data remains unchanged */
  329.         for(i=0; i<NUMSIGDASH; i++)        /* Add '---' signature separator here */
  330.         *dataptr++ = '-';
  331.         *dataptr++ = '\n';
  332.         fread((void *)dataptr, 1, length, fpin);
  333.         fclose(fpin);        /* This was missing in V1.0 release */
  334.         *(dataptr+length) = '\0';
  335.         [pbid declareTypes:&NXAsciiPboardType num:1 owner:self];
  336.         [pbid writeType:NXAsciiPboardType data:data length:strlen(data)];
  337.         free(data);
  338.     }
  339.     else
  340.         *errmsg = "Cannot open signature file.";
  341.     }
  342.     return self;
  343. }
  344.  
  345. // Adds the content of ~/.signature.rtf at the current cursor location.
  346. // RTF signature insertion method.
  347. - insertRtfSignature:(id)pbid userData:(const char *)udata error:(char **)errmsg
  348. {
  349. char *data;
  350. char *signaturefile = rtfSigFile;
  351. char signaturepath[256];
  352. int length;
  353. struct stat filestat;
  354. FILE *fpin;
  355.     sprintf(signaturepath, "%s/%s", NXHomeDirectory(), signaturefile);
  356.     if(stat(signaturepath, &filestat))
  357.     {
  358.     data = "";
  359.     length = 0;
  360.     *errmsg = "No RTF signature file found in your home directory.";
  361.     }
  362.     else
  363.     {
  364.     length = filestat.st_size;
  365.     if((fpin = fopen(signaturepath, "r")) != NULL)
  366.     {
  367.         data = malloc(length+10);
  368.         fread((void *)data, 1, length, fpin);
  369.         fclose(fpin);
  370.         *(data+length) = '\0';
  371.         [pbid declareTypes:&NXRTFPboardType num:1 owner:self];
  372.         [pbid writeType:NXRTFPboardType data:data length:strlen(data)];
  373.         free(data);
  374.     }
  375.     else
  376.         *errmsg = "Cannot open RTF signature file.";
  377.     }
  378.     return self;
  379. }
  380.  
  381.  
  382. // Adds the content of ~/.signature.rtfd at the current cursor location.
  383. // RTFD signature insertion method.
  384. - insertRtfdSignature:(id)pbid userData:(const char *)udata error:(char **)errmsg
  385. {
  386. char *data;
  387. char *signaturefile = rtfdSigFile;
  388. char signaturepath[256];
  389. int length;
  390. struct stat filestat;
  391.     sprintf(signaturepath, "%s/%s", NXHomeDirectory(), signaturefile);
  392.     if(stat(signaturepath, &filestat))
  393.     {
  394.     data = "";
  395.     length = 0;
  396.     *errmsg = "No RTFD signature found in your home directory.";
  397.     }
  398.     else
  399.     {
  400.     
  401.     if(![gRtfdText openRTFDFrom:signaturepath])
  402.     {
  403.         [tempText selectAll:self];    // This bit of code is necessary because
  404.         [tempText paste:self];    // while Edit, Mail and Text all support RTFD
  405.         [gRtfdText selectAll:self];    // there is as yet no proper NXAtom for the
  406.         [gRtfdText copy:self];    // pasteboard type. So I use the copy and
  407.             [gRtfdText writeSelectionToPasteboard:pbid types:(NXAtom *)[[Pasteboard newName:NXGeneralPboard] types]];
  408.         [tempText selectAll:self];    // to put the text on the general pboard,
  409.         [tempText copy:self];    //from whence I then get the types!
  410.     }
  411.         else
  412.         *errmsg = "Cannot open RTFD signature.";
  413.     }
  414.     return self;
  415. }
  416.  
  417. // quote an RTF selection by graying it out
  418. - grayRTFSelection:(id)pbid userData:(const char *)udata error:(char **)errmsg
  419. {
  420.     NXAtom pbtype[] = {NXRTFPboardType, 0};
  421.     [tempText selectAll:self];
  422.     [tempText readSelectionFromPasteboard:pbid];
  423.     [tempText setSelGray:NX_DKGRAY];
  424.     [tempText writeSelectionToPasteboard:pbid types:pbtype];
  425.     return self;
  426. }
  427.  
  428.  
  429. @end
  430.